1 IFA=0THEN9
2 IFA=1THENA=2:LOAD"PIPE 1",8,1
3 IFA=2THENSYS39452:A=3
4 IFA=3THENA=4:LOAD"PIPE 2",8,1
5 IFA=4THENA=5:LOAD"SPRITES",8,1
6 IFA=5THENA=6:LOAD"PIPE 3",8,1
7 GOTO50
9 POKE53248+22,24:POKE53282,8:POKE53283,5:POKE53280,0:POKE53281,0
10 FORI=832TO832+33:READA:POKEI,A:NEXT
11 DATA120,169,51,133,1,169,0,133,95,133,90,133,88,169,208,133,96,169,240
12 DATA133,89,169,224,133,91,32,191,163,169,55,133,1,88,96
13 SYS832:POKE850,160:SYS832
14 POKE56576,PEEK(56576)AND252
15 POKE53272,8:POKE648,192:A=1:PRINT"[147]LOADING ... PLEASE WAIT !":GOTO2
50 PRINT"[147][144]LOAD"CHR$(34)"MAIN"CHR$(34)",8"
51 PRINT"RUN"
52 POKE631,19:POKE632,13:POKE633,13:POKE634,13:POKE198,4:NEW